﻿
Partial Class Paginas_Paso
    Inherits System.Web.UI.Page
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim ACCION As String = Request.QueryString("ACCION")

        If ACCION <> 0 Then
            Dim valores() As String = Request.QueryString("Col0").Split(";")
            Session("ncodigo_pki") = valores(0)
            Session("trut") = valores(1)
        Else
            Session("trut") = Request.QueryString("trut")
            Session("ncodigo_pki") = ""
        End If


        Response.Redirect("RegistroMedico.htm")

    End Sub
End Class
